;;;QQ:67762207
[@HorseSystem]
{
#SAY
_ӭǡļλܹع\\
</@BuyHorse(ɫ,15,500000)> һĺɫ500000ңҪȼ15\
</@BuyHorse(,40,20000000)> {FCOLOR/10}{FCOLOR/12} 20000000ңҪȼ40\
</@BuyHorse(,60,90000000)> {FCOLOR/10}ǳϡе{FCOLOR/12} 9ǧ,Ҫȼ60\
</@BuyJiFenhorse(,150,70)> {FCOLOR/10}{FCOLOR/12} 150,Ҫȼ70\
</@BuyJiFenhorse(Ӱ,1200,80)> {FCOLOR/10}ǧ{FCOLOR/12} Ӱ1200,Ҫȼ80\
;;</@ASKJueYing> {FCOLOR/14}ǧ{FCOLOR/12} Ӱ \
</@SellHorse> \
</@exit>




[@BuyNewhorse]
#IF
#ACT
mov IntroCDKEY ""
mov GetHorse 0
formatstr "where fld_userid = '%s'" %USERID
actcmd READSQL "TBL_Promoters" "IntroCDKEY,GetHorse" "IntroCDKEY,GetHorse" %A9



#IF
!CheckHorse
#ELSEACT
break
#ELSESAY
Բӵ\\
</@main>




#IF
EQUAL GetHorse 1
!EQUAL IntroCDKEY ""
checklevel 75
!CheckHorse
checkcmd CHECKUSERJF 300
#ACT
horsecall Ӱ
actcmd SETUSERJF - 300 Ӱ
break
#SAY
ȻдCDKEYҲﵽ75Ѿһѵˡ\
Աʹ300ֹ {FCOLOR/14}ǧ{FCOLOR/12} Ӱ\\
<뿪/@exit>


#IF
EQUAL GetHorse 0
!EQUAL IntroCDKEY ""
checklevel 75
!CheckHorse
#ACT
break
horsecall Ӱ
formatstr "where fld_userid = '%s'" %USERID
actcmd WRITESQL "TBL_Promoters" "GetHorse" 1 %A9
#SAY
ΪдCDKEYҲﵽ75㽫ѻһƥ {FCOLOR/14}ǧ{FCOLOR/12} Ӱ\\
<뿪/@exit>

#IF
EQUAL IntroCDKEY ""
ELarge USERREBORNCOUNT 5
checkcmd CHECKUSERJF 1000
#ACT
horsecall Ӱ
actcmd SETUSERJF - 1000 Ӱ
break
#SAY
ΪûдCDKEYʹ1000.\
 {FCOLOR/14}ǧ{FCOLOR/12} Ӱ\\
<뿪/@exit>

#IF
#SAY
Բв㹺˾.\\
<뿪/@exit>



[@ASKJueYing]
#IF
#SAY
˵ͨϵͳҿԵõ귩½ĹԱ͵һƥ.\
Ӱܹ250\
25㹥22Ȼϵħ\
ָٶȱƥԿһЩ\\
<ôܵõƥأ/@Askjueying_2>

[@Askjueying_2]
#IF
#SAY
\
ӦӵCDKEYȡ\
ôﵽ涨ȼʱ\
Ϳȡսˡ\\
ӵCDKEYֱҹԱˣ\
ֻ͸¶ôˣԼˡ\

</@horsesystem>






[@BuyJiFenhorse()]
#ACT
mov A0 %ARG(1)
mov D0 %ARG(2)
mov D1 %ARG(3)

#IF
checklevel %D1
#ELSEACT
break
#ELSESAY
Բûдﵽ<$OUTPUT(D1)>ܼԦĺ\
</@main>
#IF
checkcmd CHECKUSERJF %D0
#ELSEACT
break
#ELSESAY
Բû<$OUTPUT(D0)>֡빺\
</@main>

#IF
CheckHorse
#SAY
ѾѽȰ.\
</@main>
#ELSEACT
goto @Buyredhorse_3

[@Buyredhorse_3]
#IF
checklevel %D1
checkcmd CHECKUSERJF %D0
#ACT
horsecall %A0
actcmd SETUSERJF - %D0 %A0
#SAY
ɹʣΪ{FCOLOR/1}<$USERJF>{FCOLOR/12}.\
ü̵M,лл.\
</@main>


#ELSESAY
Ļֲ,ʣ{FCOLOR/1}<$USERJF>{FCOLOR/12}.ϵGMֱӹ.\
ĵȼ70!\
<뿪/@exit>




[@BuyHorse()]
#IF
#ACT
Mov A0 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
checklevel %D0
#ELSESAY
{FCOLOR/10}ȼٴﵽ<$OUTPUT(D0)>{FCOLOR/12}ܹ<$OUTPUT(A0)>üҰɡ \\
< /@exit>
#ELSEACT
break

#IF
checkgold %D1
#ELSESAY
ǵǮ<$OUTPUT(A0)><$OUTPUT(D1)>¼λǲ<$OUTPUT(A0)>ġ\\
< /@exit>
#ELSEACT
break

#IF
CheckHorse
#SAY
㲻ΪʲôҪ \\
< /@exit>
#ACT
break

#IF
checklevel %D0
checkgold %D1
!CheckHorse
#SAY
<$OUTPUT(A0)>Ѿ㣬úտ\\
< /@exit>
#ACT
take  %D1
horsecall %A0
break

[@SellHorse]
#IF
checkhorse 1
!CheckRiding
!CheckGold 999749999
#SAY
˺ɫǱꡣ\\
< /@exit>
#ACT
actcmd givegoldex 250000
KillHorse
break

#IF
checkhorse 2
!CheckRiding
!CheckGold 989999999
#SAY
˰Ǳꡣ\\
< /@exit>
#ACT
actcmd givegoldex 10000000
KillHorse
break

#IF
checkhorse 3
!CheckRiding
!CheckGold 944999999
#SAY
˳Ǳꡣ\\
< /@exit>
#ACT
actcmd givegoldex 45000000
KillHorse
break

#IF
checkhorse 4
!CheckRiding
!CheckGold 944999999
#SAY
˺Ǳꡣ\\
< /@exit>
#ACT
actcmd givegoldex 45000000
KillHorse
break

#IF
checkhorse 5
!CheckRiding
!CheckGold 909999999
#SAY
˾ӰǱꡣ\\
< /@exit>
#ACT
actcmd givegoldex 90000000
KillHorse
break


#ELSESAY
Ϊ״̬û \\
< /@exit>
}
;;-----------------------------aragom
